home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 March - Disc 1 / Macworld (1999-03) (Disk 1).dmg / Shareware World / Info / For Developers / AM #11.1 / INTO Examples / PowerPlant / AMReminder / CAdd.cp < prev   
Encoding:
Text File  |  1998-12-22  |  8.3 KB  |  431 lines  |  [TEXT/CWIE]
  1. // CAdd.cp -- dialog methods
  2.  
  3. #include "CAdd.h"
  4.  
  5. #include <UEnvironment.h>
  6. #include <UReanimator.h>
  7. #include <URegistrar.h>
  8. #include <LStream.h>
  9. #include <LTabGroup.h>
  10. #include <LPushButton.h>
  11. #include <LAMPushButtonImp.h>
  12. #include <LGAPushButtonImp.h>
  13. #include <LPictureControl.h>
  14. #include <LAMControlImp.h>
  15. #include <LGAPictureControlImp.h>
  16. #include <LStaticText.h>
  17. #include <LAMStaticTextImp.h>
  18. #include <LGAStaticTextImp.h>
  19. #include <LClock.h>
  20. #include <LEditText.h>
  21. #include <LAMEditTextImp.h>
  22. #include <LGAEditTextImp.h>
  23. #include <LCheckBox.h>
  24. #include <LGACheckboxImp.h>
  25. #include <LPopupButton.h>
  26. #include <LAMPopupButtonImp.h>
  27. #include <LGAPopupButtonImp.h>
  28. #include <CTextUtils.h>
  29.  
  30. #include "DReminder.h"
  31. #include "AMReminderCmds.h"
  32. #include <PP_Messages.h>
  33.  
  34. const MessageT    msgDate2    = 'Date';
  35. const MessageT    msgTime2    = 'Time';
  36. const MessageT    msgMessage2    = 'Msg ';
  37. const MessageT    msgDisplayIcon    = 'Icon';
  38. const MessageT    msgDisplayAlert    = 'Alrt';
  39. const MessageT    msgPlaySound    = 'Play';
  40. const MessageT    msgSoundPopup    = 'Soup';
  41.  
  42. #define PPob_AddID    202
  43. #define RidL_AddID    202
  44.  
  45. Boolean        CAdd::sIsRegistered = false;
  46.  
  47. //----------
  48. CAdd*        CAdd::CreateAdd (
  49.     LCommander*        inSuperCommander,
  50.     CommandT        inCommand,
  51.     DReminder*        inData)
  52. {
  53.     if (!sIsRegistered) {
  54.         RegisterClass ();
  55.     }
  56.     CAdd*        dlog;
  57.     dlog = ((CAdd *)LWindow::CreateWindow(PPob_AddID, inSuperCommander));
  58.     dlog->mCommand = inCommand;
  59.     dlog->SetFromData (inData);
  60.  
  61.     return dlog;
  62. }
  63.  
  64. //----------
  65. #define    RegisterClasses(AbstractClass,AMImpClass,GAImpClass)    \
  66.     RegisterClass_(AbstractClass);    \
  67.     if (useAppearance) {    \
  68.         RegisterClassID_(AMImpClass, AbstractClass::imp_class_ID);    \
  69.     } else {    \
  70.         RegisterClassID_(GAImpClass, AbstractClass::imp_class_ID);    \
  71.     }
  72.  
  73. //----------
  74. void    CAdd::RegisterClass ()
  75. {
  76.     Boolean        useAppearance = UEnvironment::HasFeature (env_HasAppearance);
  77.  
  78.     RegisterClass_(CAdd);
  79.  
  80.     // register the pane classes we use
  81.     RegisterClasses (LPushButton, LAMPushButtonImp, LGAPushButtonImp);
  82.     RegisterClasses (LPictureControl, LAMControlImp, LGAPictureControlImp);
  83.     RegisterClasses (LStaticText, LAMStaticTextImp, LGAStaticTextImp);
  84.     RegisterClasses (LClock, LAMControlImp, LAMControlImp);
  85.     RegisterClasses (LEditText, LAMEditTextImp, LGAEditTextImp);
  86.     RegisterClasses (LCheckBox, LAMControlImp, LGACheckBoxImp);
  87.     RegisterClasses (LPopupButton, LAMPopupButtonImp, LGAPopupButtonImp);
  88.  
  89.     sIsRegistered = true;
  90. }
  91.  
  92. //----------
  93. CAdd::CAdd (
  94.     LStream*    inStream)
  95.     : LGADialog (inStream)
  96. {
  97.     mData = nil;
  98. }
  99.  
  100. //----------
  101. CAdd::~CAdd()
  102. {
  103.     delete mData;
  104. }
  105.  
  106. //----------
  107. //    This member function gets called once the containment hierarchy that contains
  108. //    this pane has been built. It gives us a chance to get data members for
  109. //    interesting subviews, and to do other operations now that our subviews exist.
  110. void    CAdd::FinishCreateSelf()
  111. {
  112.     LGADialog::FinishCreateSelf();
  113.  
  114.     mOKButton = (LPushButton*) FindPaneByID ('OK  ');
  115.  
  116.     mCancelButton = (LPushButton*) FindPaneByID ('Canl');
  117.  
  118.     mDate2Field = (LClock*) FindPaneByID ('Date');
  119.     mDate2Field->AddListener (this);
  120.  
  121.     mTime2Field = (LClock*) FindPaneByID ('Time');
  122.     mTime2Field->AddListener (this);
  123.  
  124.     mMessage2Field = (LEditText*) FindPaneByID ('Msg ');
  125.     mMessage2Field->AddListener (this);
  126.  
  127.     mDisplayIconCheck = (LCheckBox*) FindPaneByID ('Icon');
  128.  
  129.     mDisplayAlertCheck = (LCheckBox*) FindPaneByID ('Alrt');
  130.  
  131.     mPlaySoundCheck = (LCheckBox*) FindPaneByID ('Play');
  132.  
  133.     mSoundPopupPopup = (LPopupButton*) FindPaneByID ('Soup');
  134.  
  135.  
  136.     LTabGroup*        tabGroup = new LTabGroup(this);
  137.     mDate2Field->SetSuperCommander(tabGroup);    // becomes the active field
  138.     mTime2Field->SetSuperCommander(tabGroup);
  139.     mMessage2Field->SetSuperCommander(tabGroup);
  140.  
  141.     UReanimator::LinkListenerToControls(this, this, RidL_AddID);
  142.         // the purpose is to "connect" self to whatever controls
  143.         // that we want to "listen" to
  144.  
  145. // any additional initialization for your dialog:
  146.  
  147. }
  148.  
  149. //----------
  150. void    CAdd::SetFromData (
  151.     DReminder*        inData)
  152. {
  153.     mData = inData;
  154.     mData->AddListener (this);
  155.  
  156.     {
  157.         LongDateRec        dateTime = mData->GetYearMonthDay ();
  158.         mDate2Field->SetLongDate (dateTime);
  159.     }
  160.     {
  161.         LongDateRec        dateTime = mData->GetHourMinute ();
  162.         mTime2Field->SetLongDate (dateTime);
  163.     }
  164.     CTextUtils::SetText (mMessage2Field, mData->GetMessage ());
  165.     mDisplayIconCheck->SetValue (mData->GetShowIcon ());
  166.     mDisplayAlertCheck->SetValue (mData->GetShowAlert ());
  167.     mPlaySoundCheck->SetValue (mData->GetPlaySound ());
  168.     mSoundPopupPopup->SetValue (mData->GetSoundIndex ());
  169. }
  170.  
  171. //----------
  172. DReminder*        CAdd::GetData ()
  173. {
  174.  
  175.     return mData;
  176. }
  177.  
  178. //----------
  179. void    CAdd::DataChanged (
  180.     long        inDataID)
  181. {
  182.     StopListening ();
  183.  
  184.     if (inDataID == idYearMonthDay) {
  185.         LongDateRec        dateTime = mData->GetYearMonthDay ();
  186.         mDate2Field->SetLongDate (dateTime);
  187.     }
  188.     if (inDataID == idHourMinute) {
  189.         LongDateRec        dateTime = mData->GetHourMinute ();
  190.         mTime2Field->SetLongDate (dateTime);
  191.     }
  192.     if (inDataID == idMessage) {
  193.         if (!mMessage2Field->IsTarget ()) {
  194.             CTextUtils::SetText (mMessage2Field, mData->GetMessage ());
  195.         }
  196.     }
  197.     if (inDataID == idShowIcon) {
  198.         mDisplayIconCheck->SetValue (mData->GetShowIcon ());
  199.     }
  200.     if (inDataID == idShowAlert) {
  201.         mDisplayAlertCheck->SetValue (mData->GetShowAlert ());
  202.     }
  203.     if (inDataID == idPlaySound) {
  204.         mPlaySoundCheck->SetValue (mData->GetPlaySound ());
  205.     }
  206.     if (inDataID == idSoundIndex) {
  207.         mSoundPopupPopup->SetValue (mData->GetSoundIndex ());
  208.     }
  209.  
  210.     StartListening ();
  211. }
  212.  
  213. //----------
  214. void    CAdd::ListenToMessage (
  215.     MessageT    inMessage,
  216.     void        *ioParam)
  217. {
  218.     switch (inMessage) {
  219.     case msg_OK:
  220.             GetSuperCommander()->ProcessCommand(-mCommand, this);
  221.         break;
  222.  
  223.     case msg_Cancel:
  224.             DoClose();
  225.         break;
  226.  
  227.     case msgDataChanged:
  228.             DataChanged ((long)ioParam);
  229.         break;
  230.  
  231.     case msgDate2:
  232.         {
  233.             LongDateRec        dateTime;
  234.  
  235.             mDate2Field->GetLongDate (dateTime);
  236.             mData->SetYearMonthDay (dateTime);
  237.         }
  238.         break;
  239.  
  240.     case msgTime2:
  241.         {
  242.             LongDateRec        dateTime;
  243.  
  244.             mTime2Field->GetLongDate (dateTime);
  245.             mData->SetHourMinute (dateTime);
  246.         }
  247.         break;
  248.  
  249.     case msgMessage2:
  250.         {
  251.             Str255        string;
  252.  
  253.             mMessage2Field->GetDescriptor (string);
  254.             mData->SetMessage (string);
  255.         }
  256.         break;
  257.  
  258.     case msgDisplayIcon:
  259.             mData->SetShowIcon (mDisplayIconCheck->GetValue ());
  260.         break;
  261.  
  262.     case msgDisplayAlert:
  263.             mData->SetShowAlert (mDisplayAlertCheck->GetValue ());
  264.         break;
  265.  
  266.     case msgPlaySound:
  267.             mData->SetPlaySound (mPlaySoundCheck->GetValue ());
  268.         break;
  269.  
  270.     case msgSoundPopup:
  271.             mData->SetSoundIndex (mSoundPopupPopup->GetValue ());
  272.         break;
  273.  
  274.  
  275.     default:
  276.           ; // do something
  277.         break;
  278.     }
  279. }
  280.  
  281. //----------
  282. Boolean        CAdd::ObeyCommand (
  283.     CommandT    inCommand,
  284.     void*        ioParam)
  285. {
  286.     Boolean        cmdHandled = true;
  287.  
  288.     if (inCommand < 0) {
  289.         // modal dialog has finished
  290.  
  291.         switch (-inCommand) {
  292.         }
  293.  
  294.     } else {
  295.         switch (inCommand) {
  296.  
  297.         default:
  298.                 cmdHandled = LGADialog::ObeyCommand(inCommand, ioParam);
  299.             break;
  300.         }
  301.     }
  302.  
  303.     return cmdHandled;
  304. }
  305.  
  306. //----------
  307. void    CAdd::FindCommandStatus (
  308.     CommandT    inCommand,
  309.     Boolean        &outEnabled,
  310.     Boolean        &outUsesMark,
  311.     Char16        &outMark,
  312.     Str255        outName)
  313. {
  314.     outUsesMark = false;
  315.  
  316.     switch (inCommand) {
  317.  
  318.     // +++ Add cases here for the commands you handle
  319.  
  320.     default:
  321.             LGADialog::FindCommandStatus(inCommand, outEnabled,
  322.                                             outUsesMark, outMark, outName);
  323.         break;
  324.     }
  325. }
  326.  
  327. // following functions will be obsoleted
  328. // retained only for backwards compatibility
  329.     /*
  330.     //----------
  331.     Date
  332.     CAdd::GetDate2FieldDate ()
  333.     {
  334.     }
  335.  
  336.     //----------
  337.     void
  338.     CAdd::SetDate2FieldDate (
  339.         Date        str)
  340.     {
  341.     }
  342.     */
  343.  
  344.     /*
  345.     //----------
  346.     Date
  347.     CAdd::GetTime2FieldDate ()
  348.     {
  349.     }
  350.  
  351.     //----------
  352.     void
  353.     CAdd::SetTime2FieldDate (
  354.         Date        str)
  355.     {
  356.     }
  357.     */
  358.  
  359. //----------
  360. void
  361. CAdd::GetMessage2FieldString (
  362.     Str255        str)
  363. {
  364.     mMessage2Field->GetDescriptor (str);
  365. }
  366.  
  367. //----------
  368. void
  369. CAdd::SetMessage2FieldString (
  370.     ConstStr255Param        str)
  371. {
  372.     mMessage2Field->SetDescriptor (str);
  373. }
  374.  
  375. //----------
  376. Boolean
  377. CAdd::GetDisplayIconChoice()
  378. {
  379.     return mDisplayIconCheck->GetValue();
  380. }
  381.  
  382. void
  383. CAdd::SetDisplayIconChoice (
  384.     Boolean        inChoice)
  385. {
  386.     mDisplayIconCheck->SetValue (inChoice);
  387. }
  388.  
  389. //----------
  390. Boolean
  391. CAdd::GetDisplayAlertChoice()
  392. {
  393.     return mDisplayAlertCheck->GetValue();
  394. }
  395.  
  396. void
  397. CAdd::SetDisplayAlertChoice (
  398.     Boolean        inChoice)
  399. {
  400.     mDisplayAlertCheck->SetValue (inChoice);
  401. }
  402.  
  403. //----------
  404. Boolean
  405. CAdd::GetPlaySoundChoice()
  406. {
  407.     return mPlaySoundCheck->GetValue();
  408. }
  409.  
  410. void
  411. CAdd::SetPlaySoundChoice (
  412.     Boolean        inChoice)
  413. {
  414.     mPlaySoundCheck->SetValue (inChoice);
  415. }
  416.  
  417. //----------
  418. short
  419. CAdd::GetSoundPopupPopupChoice ()
  420. {
  421.     return mSoundPopupPopup->GetValue();
  422. }
  423.  
  424. void
  425. CAdd::SetSoundPopupPopupChoice (
  426.     short        choice)
  427. {
  428.     mSoundPopupPopup->SetValue (choice);
  429. }
  430.  
  431.